AUTO 1
lock 1

select 5
MAKE a

:again

rand a,3
jeq a,1,:spin

:check
jgt wherey,37,:again

:loop
fire
goto :loop
FACE 5

goto :again

:spin
RIGHT
goto :check